﻿
Namespace LightSwitchApplication

    Public Class SearchCarrier

        Private Sub gridAddAndEditNew_CanExecute(ByRef result As Boolean)
            ' Write your code here.

        End Sub

        Private Sub gridAddAndEditNew_Execute()
            ' Write your code here.
            Me.Application.ShowCarrierManagement(Nothing)
        End Sub
    End Class

End Namespace
